Round function

  DECLARATION:  Round(X : Real);

      PURPOSE:  Rounds a real-type value to an integer-type value

         UNIT:  System

  RESULT TYPE:  LongInt

      REMARKS:  Where X is a real-type expression, Round returns a LongInt
                value that is the value of X rounded to the nearest whole
                number.  If X is exactly halfway between 2 whole numbers,
                the result is the number with the greatest absolute magnitude.

                An error will occur if the rounded value of X is not within
                the LongInt range.